home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / dialogic.zip / DIALOG7.DB < prev    next >
Text File  |  1990-01-31  |  4KB  |  119 lines
  1. DB(Level%, 1).Code = 1
  2. DB(Level%, 1).Y = 0
  3. DB(Level%, 1).X = 0
  4. DB(Level%, 1).Height = 17
  5. DB(Level%, 1).Wdth = 65
  6. DB(Level%, 1).Bordertype = 1
  7. DB(Level%, 1).PrimaryColor = -c1
  8. DB(Level%, 1).WindowColor = -c1
  9. DB(Level%, 1).Text = "The Smart Label"
  10. DB(Level%, 1).TextColor = c2
  11. DB(Level%, 1).SecondaryColor = c1
  12.  
  13. LB(1).Text = "The smart label is one method of placing text anywhere in"
  14. LB(2).Text = "a dialog box.  For example, in the previous dialog box you"
  15. LB(3).Text = "may have noticed that the option buttons had no text"
  16. LB(4).Text = "associated with them.  A smart label is text information "
  17. LB(5).Text = "which is linked to a dialog box element,  such as option"
  18. LB(6).Text = "buttons. "
  19. LB(7).Text = ""
  20. LB(8).Text = "Smart labels, like other label types, may have an "
  21. LB(9).Text = "embedded Alt-key.  This way, if the <Alt> key is held"
  22. LB(10).Text = "down while a highlighted character is typed,  a dialog"
  23. LB(11).Text = "box element corresponding to that key will be accessed."
  24. LB(12).Text = "And smart labels are also mouse-sensitive!"
  25. LB(13).Text = " "
  26. LB(14).Text = "Take a moment to press the <Alt> key and observe the high-"
  27. LB(15).Text = "lighted characters.  Try to access different dialog box"
  28. LB(16).Text = "elements using smart labels before proceeding..."
  29.  
  30. DB(Level%, 2).Code = 3
  31. DB(Level%, 2).Y = 3
  32. DB(Level%, 2).X = 2
  33. DB(Level%, 2).Height = 5
  34. DB(Level%, 2).Wdth = 1
  35. DB(Level%, 2).WindowColor = c1
  36. DB(Level%, 2).PrimaryColor = c1
  37. DB(Level%, 2).SecondaryColor = c2
  38. DB(Level%, 2).SelectedColor = -1
  39. DB(Level%, 2).StarColor = c1
  40. DB(Level%, 2).ItemLength = 60
  41. DB(Level%, 2).KeyColor = 0
  42. DB(Level%, 2).Bordertype = 2
  43. DB(Level%, 2).Link = 0
  44. DB(Level%, 2).TextY = 0
  45. DB(Level%, 2).TextX = 0
  46. DB(Level%, 2).TextColor = c1
  47. DB(Level%, 2).NumberOne = 1
  48. DB(Level%, 2).NumberTwo = 16
  49. DB(Level%, 2).Default = 0
  50.  
  51. DB(Level%, 3).Code = 5
  52. DB(Level%, 3).NumberOne = 3
  53. DB(Level%, 3).Default = 1
  54. DB(Level%, 3).TextString = "11,17,12,17,13,17"
  55. DB(Level%, 3).WindowColor = c1
  56. DB(Level%, 3).SelectedColor = c1
  57. DB(Level%, 3).StarColor = c1
  58.  
  59. DB(Level%, 4).Code = 6
  60. DB(Level%, 4).Y = 11
  61. DB(Level%, 4).X = 21
  62. DB(Level%, 4).Text = "~Zippity"
  63. DB(Level%, 4).TextColor = c1
  64. DB(Level%, 4).KeyColor = c4
  65. DB(Level%, 4).Link = 3
  66. DB(Level%, 4).NumberOne = 1
  67.  
  68. DB(Level%, 5).Code = 6
  69. DB(Level%, 5).Y = 12
  70. DB(Level%, 5).X = 21
  71. DB(Level%, 5).Text = "~Doo"
  72. DB(Level%, 5).TextColor = c1
  73. DB(Level%, 5).KeyColor = c4
  74. DB(Level%, 5).Link = 3
  75. DB(Level%, 5).NumberOne = 2
  76.  
  77. DB(Level%, 6).Code = 6
  78. DB(Level%, 6).Y = 13
  79. DB(Level%, 6).X = 21
  80. DB(Level%, 6).Text = "Da~h"
  81. DB(Level%, 6).TextColor = c1
  82. DB(Level%, 6).KeyColor = c4
  83. DB(Level%, 6).Link = 3
  84. DB(Level%, 6).NumberOne = 3
  85.  
  86. DB(Level%, 7).Code = 6
  87. DB(Level%, 7).Y = 2
  88. DB(Level%, 7).X = 4
  89. DB(Level%, 7).Text = "~Even this List Box may have a Smart Label!"
  90. DB(Level%, 7).TextColor = c1
  91. DB(Level%, 7).KeyColor = c4
  92. DB(Level%, 7).Link = 2
  93.  
  94. DB(Level%, 8).Code = 4
  95. DB(Level%, 8).Y = 12
  96. DB(Level%, 8).X = 38
  97. DB(Level%, 8).PrimaryColor = c1
  98. DB(Level%, 8).SelectedColor = c1
  99. DB(Level%, 8).TextY = 12
  100. DB(Level%, 8).TextX = 42
  101. DB(Level%, 8).Text = "Check ~Box"
  102. DB(Level%, 8).TextColor = c1
  103. DB(Level%, 8).KeyColor = c4
  104. DB(Level%, 8).StarColor = c1
  105. DB(Level%, 8).Default = -1
  106.  
  107. DB(Level%, 9).Code = 7
  108. DB(Level%, 9).Y = 16
  109. DB(Level%, 9).X = 31
  110. DB(Level%, 9).Text = "~OK"
  111. DB(Level%, 9).PrimaryColor = c1
  112. DB(Level%, 9).WindowColor = c1
  113. DB(Level%, 9).SelectedColor = c3
  114. DB(Level%, 9).KeyColor = c4
  115. DB(Level%, 9).SecondaryColor = c4
  116. DB(Level%, 9).TextString = CHR$(13)
  117.  
  118. DB(Level%, 10).Code = 0
  119.